home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / apps / database / ingres04.lzh / source / gutil / sequal.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-02-05  |  347 b   |  22 lines
  1. # include    <useful.h>
  2. # include    <sccs.h>
  3.  
  4. SCCSID(@(#)sequal.c    8.2    2/5/85)
  5.  
  6. /*
  7. **  SEQUAL -- string equality test
  8. **
  9. **    null-terminated strings `a' and `b' are tested for
  10. **        absolute equality.
  11. **    returns one if equal, zero otherwise.
  12. */
  13.  
  14. sequal(a, b)
  15. register char    *a, *b;
  16. {
  17.     while (*a || *b)
  18.         if (*a++ != *b++)
  19.             return(FALSE);
  20.     return(TRUE);
  21. }
  22.